home *** CD-ROM | disk | FTP | other *** search
- property Znacka
-
- on getPropertyDescriptionList
- set description to [:]
- addProp(description, #Znacka, [#comment: "Znacka:", #format: #string, #default: EMPTY])
- return description
- end
-
- on getBehaviorDescription
- return "Nájezd a klik"
- end
-
- on beginSprite me
- set the visible of sprite the spriteNum of me to 1
- set the visible of sprite (the spriteNum of me + 1) to 0
- end
-
- on endSprite me
- end
-
- on mouseEnter me
- puppetSound(1, "Najezd")
- set the cursor of sprite the spriteNum of me to [member "ruka_1", member "ruka_2"]
- set the visible of sprite (the spriteNum of me + 1) to 1
- end
-
- on mouseLeave me
- set the visible of sprite (the spriteNum of me + 1) to 0
- set the cursor of sprite the spriteNum of me to -1
- end
-
- on mouseDown me
- puppetSound(1, "Klik")
- end
-
- on mouseUp me
- go(label(Znacka))
- if the castNum of sprite 100 = the number of member "Napoveda_3" then
- set the castNum of sprite 100 to member "Napoveda_1"
- updateStage()
- end if
- end
-